home *** CD-ROM | disk | FTP | other *** search
/ TPUG - Toronto PET Users Group / TPUG Users Group CD / TPUG Users Group CD.iso / PLUS4 / plus4disk1.d64 / ch2.08 super < prev    next >
Text File  |  2009-01-03  |  3KB  |  53 lines

  1. Ç*NB"1:CH2.08  SUPER"
  2. Ç*SP0:LM8:RM62:PP66:PG59
  3. Ç*VP3:HL8:HR72:HD0:├16/+4: ╙╒╨┼╥╧╙┼      ÇúÇúÇúÇúÇúÇúÇúÇúÇúÇúÇúÇúÇúÇú,,╙ECTION XX
  4. Ç*HS2:------------------------------------,,----------
  5. Ç*FT0:-----------------------,,----------
  6. Ç*FS3:(C) 1984 ┼LIZABETH ─EAL,,         Ç#
  7. ╙ECTION
  8. Ç*LN2:CN1;╙╒╨┼╥╧╙┼Ç*LN2:CN0
  9.      ╘HIS IS AN ARTISTIC SECTION WITH MATHEMATICAL ORIGINS. ╘HE PROGRAM DRAWS AN ENORMOUS VARIETY OF DESIGNS. ╚ERE IS AN ILLUSTRATION OF ONE DESIGN:
  10.      
  11. // PIXPIC: S2.9.2.11 //
  12.      
  13.      ╧RIGINAL PROGRAM ╙╒╨┼╥╧╙┼ WAS PUBLISHED FOR THE ├OMMODORE ╨┼╘ COMPUTER A LONG TIME AGO IN THE ═╔├╥╧ MAGAZINE. ╔ DO NOT HAVE ANY FURTHER INFORMATION ABOUT THE SOURCE. ╫E DO NOT REALLY NEED IT, AS THE PLOTTING COMMANDS ARE STANDARD GEOMETRY NOT OWNED BY ANYBODY.
  14.  
  15.      ╘HIS PROGRAM INVITES YOU TO TRY THINGS OUT BY CHANGING LINE 110. ╔N FACT, SOME DETAILS WILL BE OMITTED ON PURPOSE, TO LET YOU PLAY WITH THIS PROGRAM:
  16.  
  17. // PRG: SUPEROSE//
  18.  
  19. Ç*FP7
  20. ***  ╓┴╥╔┴┬╠┼╙  ***
  21.  
  22. ╠   IF SET TO 0 WE DRAW POINTS
  23.     IF SET TO -1 WE DRAW LINES
  24. ╦   CORRECTION FOR ╘╓
  25. ╙─  PLOT DENSITY - HOW FREQUENT THE POINTS
  26. ╘, ╙╪, ╙┘ ARE FOR YOU TO PLAY WITH
  27. ╚╪  MIDPOINT ON THE ╪ COORDINATE (HORIZONTAL)
  28. ╚┘  MIDPOINT ON THE ┘ COORDINATE (VERTICAL)
  29.     FLIPPED, SO THAT POINT 0,0 IS IN THE 
  30.     LOWER LEFT-HAND CORNER
  31.  
  32. ***  ╔╬╙╘╥╒├╘╔╧╬╙  ***
  33.  
  34.      ╥╒╬ IT AND WATCH THE SHOW. ╘HERE IS A FLASHING "╦┼┘" WORD IN THE CORNER TO REMIND YOU THAT TO STOP THE DRAWING YOU CAN PUSH ANY KEY. ╙O LONG AS THE SIGN IS FLASHING, THE COMPUTER PLOTS ITS WAY, SOMETIMES RETRACING OLD PATH.
  35.  
  36.      ╙O, PRESS ANY KEY TO EXIT THE DRAWING OR TO EXIT THE GRAPHIC MODE AFTER THE PLOT IS COMPLETE.
  37.  
  38.      ┴S SOON AS YOU EXIT THE PROGRAM IT AUTOMATICALLY ╠╔╙╘S LINE 110 FOR YOU. ╘HIS LINE CONTAINS THE IMPORTANT PLOTTING PARAMETERS, SO IT IS ALL READY FOR YOU TO MODIFY.
  39.  
  40. ***  ╨╥╧╩┼├╘╙  ***
  41.  
  42.      ═ODIFY THE PARAMETERS, AS SUGGESTED ABOVE.
  43.  
  44.      ╘HIS IS A VERY INTERESTING PROGRAM. ╞IRST OF ALL, DID YOU NOTICE THAT ALL PLOTTING IS CONFINED TO THE SCREEN? ╬OTHING JUMPS OUTSIDE. ╔T IS AS IF YOU HAD A PENCIL ATTACHED TO THE MIDDLE OF THE SCREEN WITH A RUBBER BAND. ╔T GOES FAR AWAY AND COMES RIGHT BACK.
  45.  
  46.      ╘HAT'S PART OF THE BEAUTY IN SOME MATHEMATICS. ╘HE OTHER NEAT ASPECT OF THE FORMULA USED FOR THE DISPLAYS IS THAT ONE FORMULA CAN DRAW SUCH A VARIETY OF PATTERNS. ╘HE PATTERNS BELONG TO A FAMILY OF CURVES - ONE DEFINITION, BUT DIFFERENT PARAMETERS, WHICH YOU HAVE BEEN CHANGING IN LINE 110.
  47.  
  48.      ├AN YOU TELL WHAT DO VARIABLES ╙╪, ╙┘, ╙─ AND ╘ DO?  ─ID YOU TRY TO GET A CIRCLE IN THE UPPER OR THE LOWER HALF OF THE SCREEN? ╚OW ABOUT A FIVE-LEAVED FLOWER?
  49.  
  50.      ╘HE PLOTTING IS DONE BY CALCULATING  IN THE SO CALLED ├ARTESIAN (RECTANGULAR COORDINATES) RELATIVE TO POINT 0,0 IN THE BOTTOM LEFT HAND CORNER OF THE SCREEN. ╘HE CALCULATION IS BASED, HOWEVER ON POLAR COORDINATES (0,0 IN THE CENTER, MEASURING OF ANGLES IN RADIANS). ╔ FIND THIS METHOD EASIER, SINCE THE ADJUSTMENT FOR THE UNPROPORTIONAL SCREEN SEEMS EASIER TO MAKE (VALUE ╦), BUT YOU CAN TRY YOUR OWN APPROACHES. ╥EAD UP ON THE GRAPHIC COMMANDS IN THE MANUAL.
  51.  
  52.      ╘HERE ARE MANY FORMULAS IN MATHEMATICAL TEXTS THAT ARE WORTH PLUGGING INTO THE COMPUTER FOR PLOTTING. ╙PIRALS COME TO MIND, THE FORMULA IS SURPRISINGLY SIMPLE. ╘RY TO DESIGN YOUR OWN CODE TO DRAW A SPIRAL FROM INSIDE OUT, THEN OUTISDE IN, THEN WITH VARYING DISTANCES BETWEEN ITS LINES, AND SO ON.
  53.